home *** CD-ROM | disk | FTP | other *** search
- property mySprite, onMember, offMember, downmember, spriteNum
-
- on beginSprite me
- mySprite = sprite(spriteNum)
- offMember = mySprite.member.number
- onMember = offMember + 1
- downmember = offMember + 2
- end
-
- on mouseEnter me
- if not (the mouseDown) then
- mySprite.member = onMember
- else
- mySprite.member = downmember
- end if
- end
-
- on mouseLeave me
- mySprite.member = offMember
- end
-
- on mouseDown me
- mySprite.member = downmember
- end
-
- on mouseUp me
- mySprite.member = offMember
- end
-